home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Programmierung
/
Power-Programmierung (Tewi)(1994).iso
/
magazine
/
progjour
/
1991
/
06
/
alib
/
isxdigit.asm
< prev
next >
Wrap
Assembly Source File
|
1991-08-23
|
385b
|
28 lines
include asm.inc
public isxdigit
.code
extn isdigit
;; isxdigit
;
; entry AL character
; exit Zf if 0..9 A..F a..f
;
isxdigit proc
cmp al,'f'
jae ixd2 ; if f or non-xdigit
cmp al,'a'
jae ixd1 ; if a..f
cmp al,'F'
jae ixd2 ; if F or non-xdigit
cmp al,'A'
jae ixd1 ; if A..F
jmp isdigit
ixd1: cmp al,al
ixd2: ret
isxdigit endp
end